home *** CD-ROM | disk | FTP | other *** search
/ Developer Helper 1: Phil & Dave's Excellent CD / Excellent CD HFS.raw / HyperCard / HyperCard 1.2.2 International / HyperCard Danish (DK-1.2.2) / Idestakke / Baggrundsideer / background_10731.txt < prev    next >
Text File  |  1988-12-19  |  4KB  |  197 lines
  1. -- background: 10731 from stack: in
  2. -- bmap block id: 38414
  3. -- flags: 0000
  4. -- background id: 0
  5. -- name: 
  6. ----- HyperTalk script -----
  7. on openCard
  8.   put the number of this card into field "Serienummer"
  9.   pass openCard
  10. end openCard
  11. on openBackground
  12.   push recent card
  13. end openBackground
  14.  
  15.  
  16. -- part 1 (field)
  17. -- low flags: 00
  18. -- high flags: 0000
  19. -- rect: left=70 top=60 right=77 bottom=172
  20. -- title width / last selected line: 0
  21. -- icon id / first selected line: 0 / 0
  22. -- text alignment: 1
  23. -- font id: 3
  24. -- text size: 10
  25. -- style flags: 0
  26. -- line height: 13
  27. -- part name: 
  28.  
  29.  
  30. -- part 2 (field)
  31. -- low flags: 01
  32. -- high flags: 0000
  33. -- rect: left=207 top=58 right=75 bottom=309
  34. -- title width / last selected line: 0
  35. -- icon id / first selected line: 0 / 0
  36. -- text alignment: 1
  37. -- font id: 3
  38. -- text size: 10
  39. -- style flags: 0
  40. -- line height: 13
  41. -- part name: Serienummer
  42.  
  43.  
  44. -- part 3 (field)
  45. -- low flags: 00
  46. -- high flags: 0000
  47. -- rect: left=346 top=56 right=73 bottom=448
  48. -- title width / last selected line: 0
  49. -- icon id / first selected line: 0 / 0
  50. -- text alignment: 1
  51. -- font id: 3
  52. -- text size: 10
  53. -- style flags: 0
  54. -- line height: 13
  55. -- part name: 
  56.  
  57.  
  58. -- part 6 (field)
  59. -- low flags: 01
  60. -- high flags: 2000
  61. -- rect: left=64 top=94 right=283 bottom=450
  62. -- title width / last selected line: 0
  63. -- icon id / first selected line: 0 / 0
  64. -- text alignment: 0
  65. -- font id: 3
  66. -- text size: 14
  67. -- style flags: 0
  68. -- line height: 18
  69. -- part name: Artikeltitel
  70.  
  71.  
  72. -- part 7 (button)
  73. -- low flags: 00
  74. -- high flags: 0000
  75. -- rect: left=225 top=287 right=312 bottom=252
  76. -- title width / last selected line: 0
  77. -- icon id / first selected line: 1014 / 1014
  78. -- text alignment: 1
  79. -- font id: 0
  80. -- text size: 12
  81. -- style flags: 0
  82. -- line height: 16
  83. -- part name: Prev
  84. ----- HyperTalk script -----
  85. on mouseUp
  86.   visual effect wipe right
  87.   go to previous card
  88. end mouseUp
  89.  
  90.  
  91.  
  92. -- part 8 (button)
  93. -- low flags: 00
  94. -- high flags: 0000
  95. -- rect: left=270 top=287 right=312 bottom=297
  96. -- title width / last selected line: 0
  97. -- icon id / first selected line: 1013 / 1013
  98. -- text alignment: 1
  99. -- font id: 0
  100. -- text size: 12
  101. -- style flags: 0
  102. -- line height: 16
  103. -- part name: Next
  104. ----- HyperTalk script -----
  105. on mouseUp
  106.   visual effect wipe left
  107.   go to next card
  108. end mouseUp
  109.  
  110.  
  111.  
  112. -- part 11 (button)
  113. -- low flags: 00
  114. -- high flags: 0004
  115. -- rect: left=464 top=273 right=312 bottom=506
  116. -- title width / last selected line: 0
  117. -- icon id / first selected line: 32670 / 32670
  118. -- text alignment: 1
  119. -- font id: 0
  120. -- text size: 12
  121. -- style flags: 0
  122. -- line height: 16
  123. -- part name: 
  124. ----- HyperTalk script -----
  125. on mouseUp
  126.   show all cards
  127. end mouseUp
  128.  
  129.  
  130.  
  131. -- part 12 (button)
  132. -- low flags: 00
  133. -- high flags: 0004
  134. -- rect: left=464 top=229 right=268 bottom=506
  135. -- title width / last selected line: 0
  136. -- icon id / first selected line: 20186 / 20186
  137. -- text alignment: 1
  138. -- font id: 0
  139. -- text size: 12
  140. -- style flags: 0
  141. -- line height: 16
  142. -- part name: 
  143. ----- HyperTalk script -----
  144. on mouseUp
  145.   if the name of this stack contains "Baggrundsideer"
  146.   then
  147.   show card field 2  -- explain why not sort here
  148. else
  149.   answer "Sort√©r alle kortene i denne stak efter:" with "Serienummer" or "Titel" or "Annuller"
  150.   if it is "Serienummer"
  151.   then sort by first word of first line of field "Serienummer"
  152. else if it is "Titel"
  153. then sort by first word of third line of field "Artkeltitel"
  154. end if
  155. end mouseUp
  156.  
  157.  
  158.  
  159. -- part 13 (button)
  160. -- low flags: 00
  161. -- high flags: 0004
  162. -- rect: left=3 top=23 right=52 bottom=35
  163. -- title width / last selected line: 0
  164. -- icon id / first selected line: 21700 / 21700
  165. -- text alignment: 1
  166. -- font id: 0
  167. -- text size: 12
  168. -- style flags: 0
  169. -- line height: 16
  170. -- part name: Home
  171. ----- HyperTalk script -----
  172. on mouseUp
  173.   visual effect iris open
  174.   go Home
  175. end mouseUp
  176.  
  177.  
  178.  
  179. -- part 14 (button)
  180. -- low flags: 00
  181. -- high flags: 0000
  182. -- rect: left=422 top=284 right=312 bottom=459
  183. -- title width / last selected line: 0
  184. -- icon id / first selected line: 1012 / 1012
  185. -- text alignment: 1
  186. -- font id: 0
  187. -- text size: 12
  188. -- style flags: 0
  189. -- line height: 16
  190. -- part name: Return
  191. ----- HyperTalk script -----
  192. on mouseUp
  193.   visual effect iris close
  194.   pop card
  195. end mouseUp
  196.  
  197.